home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 1998 November / IRIX 6.5.2 Base Documentation November 1998.img / usr / share / catman / p_man / cat3 / complib / dlauum.z / dlauum
Text File  |  1998-10-30  |  2KB  |  67 lines
  1.  
  2.  
  3.  
  4. DDDDLLLLAAAAUUUUUUUUMMMM((((3333FFFF))))                                                          DDDDLLLLAAAAUUUUUUUUMMMM((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      DLAUUM - compute the product U * U' or L' * L, where the triangular
  10.      factor U or L is stored in the upper or lower triangular part of the
  11.      array A
  12.  
  13. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  14.      SUBROUTINE DLAUUM( UPLO, N, A, LDA, INFO )
  15.  
  16.          CHARACTER      UPLO
  17.  
  18.          INTEGER        INFO, LDA, N
  19.  
  20.          DOUBLE         PRECISION A( LDA, * )
  21.  
  22. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  23.      DLAUUM computes the product U * U' or L' * L, where the triangular factor
  24.      U or L is stored in the upper or lower triangular part of the array A.
  25.  
  26.      If UPLO = 'U' or 'u' then the upper triangle of the result is stored,
  27.      overwriting the factor U in A.
  28.      If UPLO = 'L' or 'l' then the lower triangle of the result is stored,
  29.      overwriting the factor L in A.
  30.  
  31.      This is the blocked form of the algorithm, calling Level 3 BLAS.
  32.  
  33.  
  34. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  35.      UPLO    (input) CHARACTER*1
  36.              Specifies whether the triangular factor stored in the array A is
  37.              upper or lower triangular:
  38.              = 'U':  Upper triangular
  39.              = 'L':  Lower triangular
  40.  
  41.      N       (input) INTEGER
  42.              The order of the triangular factor U or L.  N >= 0.
  43.  
  44.      A       (input/output) DOUBLE PRECISION array, dimension (LDA,N)
  45.              On entry, the triangular factor U or L.  On exit, if UPLO = 'U',
  46.              the upper triangle of A is overwritten with the upper triangle of
  47.              the product U * U'; if UPLO = 'L', the lower triangle of A is
  48.              overwritten with the lower triangle of the product L' * L.
  49.  
  50.      LDA     (input) INTEGER
  51.              The leading dimension of the array A.  LDA >= max(1,N).
  52.  
  53.      INFO    (output) INTEGER
  54.              = 0: successful exit
  55.              < 0: if INFO = -k, the k-th argument had an illegal value
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.